120 A1$="[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
125 AO$="[221]                            [221]"
130 A2$="[221]      [176][192][192][192][192][192][192][192][192][192][192][174]          [221]"
140 A9$="[221]      [221]          [221]          [221]"
150 A3$="[221]      [173][192][192][192][192][192][192][192][192][192][192][189]          [221]"
160 A4$="[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]"
170 A5$="                                      "
180 A6$="          ":AA$="         "
190 A7$="[221]   "
200 A8$="     [221]"
220 DIMTA$(8),TB$(8),X$(8)
230 FORI=1TO8:READTA$(I),X$(I):NEXT
240 DATAF1-,"[204]IST [212]EXT",F2-,"[208]RINT [212]EXT",F3-,"[208]REVIEW",F4-,"[197]DIT [212]EXT"
250 DATAF5-,"[193]DD [212]EXT",F6-,"[196]ELETE [194]LK",F7-,"[210]EAD [198]ILE",F8-,"[215]RITE [198]ILE"
300 POKE53280,6:POKE53281,6:PRINTCHR$(14)"[147]"SPC(15)"[212]EXT [197]DITOR
310 [153]:[153][166]10)"ASCUNCTION (null)EY (null)VERLAY"
315 [153][166]10)"TAB(TAB(TAB(TAB(TAB(TAB(TAB(TAB( TAB(TAB(TAB( TAB(TAB(TAB(TAB(TAB(TAB(TAB(
325 PRINT""TAB(6)"([212][197] [214]ERSION BY [196]AN [195]HERNOFF)":
340 T$="    [212]EXT [197]DITOR
360 T1$[178]T$[170][202](A5$,1,20[171][195](T$))
380 [129]I[178]1[164]8
410 TB$(I)[178]X$(I)[170][202](A6$,1,10[171][195](X$(I)))
430 [130]I
450 [153]"   (null)EADY PRINTER -
510 PRINT"   [200]IT ANY KEY TO CONTINUE"
520 GETA$:IFA$=""THEN520
530 OPEN4,4,7:CMD4
540 PRINT#4,A1$:PRINT#4,AO$
550 PRINT#4,A7$+T1$+A8$
570 PRINT#4,AO$
580 PRINT#4,A2$
600 FORI=1TO8
610 PRINT#4,A7$+TA$(I)+"[221] "+AA$+"[221]"+TB$(I)+"[221]"
620 IFI<>8THENPRINT#4,A9$
630 IFI=2ORI=6THENPRINT#4,A9$
640 NEXT
650 PRINT#4,A3$:PRINT#4,AO$
660 PRINT#4,A4$:PRINT#4
670 PRINT#4,CHR$(12)CHR$(12):CLOSE4
700 PRINT:PRINT"   [208]RINT AGAIN (Y/N)";
710 INPUTQ$:IFQ$=""THEN710
720 IFQ$="Y"THENPRINT"[145]"A5$"[145][145]":GOTO530
730 IFQ$<>"N"THEN700
800 END